perm filename WLDMOD.HDR[AL,HE]1 blob
sn#290113 filedate 1977-06-28 generic text, type T, neo UTF8
REQUIRE "WLDMOD.REL[AL,HE]" LOAD_MODULE;
EXTERNAL RECURSIVE PROCEDURE WLDASG(RPTR(STMNT) S;
ITEMVAR IW;REFERENCE ITEMVAR OW;REFERENCE BOOLEAN NFLAG);
EXTERNAL PROCEDURE ASRTIT(RPTR(AFACT,SFACT) F;ITEMVAR IW,OW);
EXTERNAL PROCEDURE DENYIT(RPTR(SFACT,AFACT) F;ITEMVAR IW,OW);
EXTERNAL RPTR(EXPRN) PROCEDURE NEW_EXPRN(INTEGER DT,OP;RCELL ARGS);
EXTERNAL RPTR(STMNT) PROCEDURE STMAKE(RSSS SEM(NULL_RECORD));
EXTERNAL RPTR(STMNT) PROCEDURE NEW_STMNT(ITEMVAR IW,OW; RSSS SEM);
EXTERNAL RPTR(GASSIGN) PROCEDURE NEW_GASSIGN(RVAR V;INTEGER OP;
RPTR(CALCULATOR) C);
EXTERNAL RPTR(ALSODO) PROCEDURE NEW_ALSODO(RVAR V;INTEGER OP;
RPTR(CHANGER) C);
EXTERNAL PROCEDURE DO_UNFIX(ITEMVAR OW;RVAR F1,F2;REFERENCE RCELL GPHCODE);
EXTERNAL PROCEDURE DO_AFFIX(ITEMVAR OW;RVAR F1,F2,BV;REXPR AE;RVAR RGF;
REFERENCE RCELL GPHCODE);
EXTERNAL REXPR PROCEDURE DEPR(RVAR WHAT;ITEMVAR WLD);
EXTERNAL RANY PROCEDURE STTBLK(RANY S);
EXTERNAL RECPROC STINTERP(RPTR(STMNT) S);
EXTERNAL PROCEDURE WMTEST;